﻿Imports System.Windows

Namespace com
    Module main
        Public Sub PublishError(ByVal ex As Exception)
            MessageBox.Show(ex.Message, "Error:", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Sub
    End Module
End Namespace
